﻿namespace FSLib

type FilterInvert() =
    interface IFilter2D with

        member this.FilterName = "Invert"
        member this.Description = "反転処理"

        member this.Compute mat:int[,] =
            
            let invert x = 0xFFFFFF - x

            Array2D.map invert mat
